home *** CD-ROM | disk | FTP | other *** search
/ Ahoy 1986 March / Ahoy_Magazine_86-03_1986_Double_L.d64 / typing tutor 2 (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1986-01-01  |  490 b   |  16 lines
  1. 1 rem  problem #23-4 :
  2. 2 rem    typing tutor
  3. 3 rem  solution by john prager
  4. 4 rem
  5. 100 for j=0 to rnd(0)*5:read s$:next
  6. 110 ep=0:l=len(s$):print s$:print:t0=ti
  7. 120 for j=1 to l:a$=mid$(s$,j,1)
  8. 130 wait 198,15:get u$:if u$<>a$ then ep=ep+1:goto 130
  9. 140 print u$;:next:t1=ti
  10. 150 print:print"errors..."ep:print "time...."t1-t0
  11. 200 data "alas! thistles bristle in my bustle!"
  12. 210 data "wafting zephyrs quickly vex jumbo."
  13. 220 data "humble bumblebees mumble hungrily."
  14. 230 data "57% of all people invest $2.78 weekly."
  15. 240 data "for j=0 to 255:poke 53281,j:next j"
  16.